## Specifies a number of plotting parameters

# sourced from the analysis scripts to have a single theme for all figures:

library(ggplot2)

# theme used in most plots
mytheme <- theme_bw() + 
  theme(text = element_text(size = 9),
        panel.border = element_blank(),
        panel.grid.major = element_blank(),
        panel.grid.minor = element_blank(),
        panel.background = element_blank(),
        axis.line.x = element_line(color="black"),
        axis.line.y = element_line(color="black"))


# some constants defined for jitter plots and error bars
eb_size <- .75  # error bar size
eb_width <- .5  # error bar width
jitter_width <- .25  # jittering width


# supposedly OrRd palette is photocopy friendly
# see http://stackoverflow.com/questions/2895319/how-to-add-texture-to-fill-colors-in-ggplot2
mypalette <- scale_fill_brewer(palette="OrRd") 

